home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TeX 1995 July
/
TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO
/
macros
/
texsis
/
Unix
/
TEXSIS02
/
TXSsymb.tex
< prev
next >
Wrap
Text File
|
1992-08-02
|
7KB
|
169 lines
% file: TXSsymb.tex TeXsis version 2.15
% $Revision: 15.2 $ : $Date: 92/05/31 21:37:09 $ : $Author: myers $
%======================================================================*
% EXTENDED MATH SYMBOLS FOR PHYSICS
%
% This file defines extensions to the symbols in Plain TeX that are
% generally useful for physics papers, espacially for high energy physics.
% See the comments for each definition.
%-----------------------------------------------------------------------*
\message{Extended math/physics symbols.}
\newdimen\vbigd@men % for \vbig
% Vertical bars
\def\|{\ifmmode\Vert\else \char`\|\fi}
% Raise \chi and \zeta so they do not have descenders. This looks
% better in formulae (I think -EAM).
\ifx\oldzeta\undefined % hasn't been done yet, so
\let\oldzeta=\zeta % save old definiton
\def\zzeta{{\raise 2pt\hbox{$\oldzeta$}}}% % make new definition
\let\zeta=\zzeta % and attatch it
\fi
\ifx\oldchi\undefined % hasn't been done yet, so
\let\oldchi=\chi % save old definiton
\def\cchi{{\raise 2pt\hbox{$\oldchi$}}}% % make new definition
\let\chi=\cchi % and attatch it
\fi
\def\sterling{{\hbox{\it\char'44}}}
%==================================================*
% Various special symbols:
% ---------- Gradient, partial, laplacian, etc...
\def\square{\hbox{{$\sqcup$}\llap{$\sqcap$}}} % box laplacian
\def\grad{\nabla} % synonym for the gradient
\def\del{\partial} % synonym for \partial
% ---------- Fractions.
\def\frac#1#2{{\textstyle{#1\over#2}}}
\def\smallfrac#1#2{{\scriptstyle {#1 \over #2}}}
\def\half{\ifinner {\scriptstyle {1 \over 2}}%
\else \frac{1}{2}\fi}
% ---------- Bras, kets and vev's
\def\bra#1{\langle#1\vert} % \bra{stuff} gives <stuff|
\def\ket#1{\vert#1\/\rangle} % \ket{stuff} gives |stuff>
\def\vev#1{\langle{#1}\rangle} % \vev{stuff} gives <stuff>
% \simge and \simle make the "greater than about" and the "less
% than about" symbols with spacing as relations.
\def\simge{% ``greater than about'' symbol
\mathrel{\rlap{\raise 0.511ex
\hbox{$>$}}{\lower 0.511ex \hbox{$\sim$}}}}
\def\simle{% ``less than about'' symbol
\mathrel{\rlap{\raise 0.511ex
\hbox{$<$}}{\lower 0.511ex \hbox{$\sim$}}}}
\def\gtsim{\simge} % synonym for \simge
\def\ltsim{\simle} % synonym for \simle
% \parenbar puts a bar in small parentheses over a character to
% indicate an optional antiparticle. \nunubar and \ppbar are special
% cases.
\def\parenbar#1{{\null\! % left-hand spacing
\mathop{\smash#1}\limits% % superscript above
^{\hbox{\fiverm(--)}}% % 5pt type
\!\null}} % right-hand spacing
\def\nunubar{\parenbar{\nu}}
\def\ppbar{\parenbar{p}}
% \buildchar makes a compound symbol, placing #2 above #1 and #3
% below it with \limits. \overcirc is a special case.
\def\buildchar#1#2#3{{\null\! % \null, cancel space
\mathop{\vphantom{#1}\smash#1}\limits% % #1 with spacing and
^{#2}_{#3}% % #2 above, #3 below
\!\null}} % cancel space, \null
\def\overcirc#1{\buildchar{#1}{\circ}{}}
% \slashchar puts a slash through a character to represent contraction
% with Dirac matrices.
\def\slashchar#1{\setbox0=\hbox{$#1$} % set a box for #1
\dimen0=\wd0 % and get its size
\setbox1=\hbox{/} \dimen1=\wd1 % get size of /
\ifdim\dimen0>\dimen1 % #1 is bigger
\rlap{\hbox to \dimen0{\hfil/\hfil}} % so center / in box
#1 % and print #1
\else % / is bigger
\rlap{\hbox to \dimen1{\hfil$#1$\hfil}} % so center #1
/ % and print /
\fi} %
% \subrightarrow#1 puts the text #1 under an arrow of the
% appropriate length.
\def\subrightarrow#1{% % #1 under arrow
\setbox0=\hbox{% % set a box
$\displaystyle\mathop{}% % no mathop
\limits_{#1}$}% % just limits
\dimen0=\wd0% % get width
\advance \dimen0 by .5em% % add a bit
\mathrel{% % space like =
\mathop{\hbox to \dimen0{\rightarrowfill}}% % arrow to width
\limits_{#1}}} % text below
% \vbig produces very (or variably) big delimiters. The syntax is
% \vbigl<delim><size> or \vbigr<delim><size>, where <delim> is any delimiter
% and <size> is any valid dimension in pt, cm, in,.... There is also a
% \vbigm for (middle) relations.
\def\vbigl{\mathopen\vbig}
\def\vbigm{\mathrel\vbig}
\def\vbigr{\mathclose\vbig}
\def\vbig#1#2{{\vbigd@men=#2\divide\vbigd@men by 2%
\hbox{$\left#1\vbox to \vbigd@men{}\right.\n@space$}}}
% \Leftcases and \Rightcases are just \vbig \{ or \} with \smash. These
% can be used to make constructions like \cases with a nuumber on each
% line, but the spacing is NOT automatic.
\def\Leftcases#1{\smash{\vbigl\{{#1}}}
\def\Rightcases#1{\smash{\vbigr\}{#1}}}
% ---------- Functions -- all defined like \sin, etc. in Plain TeX:
\def\real{\mathop{\rm Re}\nolimits} % Re for real part
\def\imag{\mathop{\rm Im}\nolimits} % Im for imaginary part
\def\tr{\mathop{\rm tr}\nolimits} % tr for trace
\def\Tr{\mathop{\rm Tr}\nolimits} % Tr for functional trace
\def\Det{\mathop{\rm Det}\nolimits} % Det for functional determinant
\def\mod{\mathop{\rm mod}\nolimits} % mod for modulo
\def\wrt{\mathop{\rm wrt}\nolimits} % wrt for with respect to
% ---------- Abbreviations for units
\def\TeV{{\rm TeV}} % 10^12 electron volts
\def\GeV{{\rm GeV}} % 10^9 electron volts
\def\MeV{{\rm MeV}} % 10^6 electron volts
\def\KeV{{\rm KeV}} % 10^3 electron volts
\def\eV{{\rm eV}} % 1 electron volt
\def\mb{{\rm mb}} % 10^-27 cm^2
\def\mub{\hbox{$\mu$b}} % 10^-30 cm^2
\def\nb{{\rm nb}} % 10^-33 cm^2
\def\pb{{\rm pb}} % 10^-36 cm^2
\def\cmsec{{\rm cm^{-2}sec^{-1}}} % cm^-2sec^-1 for luminosity
% >>> EOF TXSsymb.tex <<<